home *** CD-ROM | disk | FTP | other *** search
/ Internet 53 / INTERNET53.iso / pc / software / windows / building / ace expert / ae301.exe / %MAINDIR% / EScripts / jscript / Pub.scr < prev    next >
Encoding:
Text File  |  1999-02-23  |  481 b   |  18 lines
  1. <SCRIPT LANGUAGE="JavaScript">
  2. <!-- begin script
  3. function CreerArray() {
  4.     this.length = CreerArray.arguments.length;
  5.     for (var i = 0; i < this.length; i++)
  6.       this[i+1] = CreerArray.arguments[i];
  7. }
  8.  var pubT, pub = 0;
  9.  function AfficherPub(pubs,pubDelay1) {
  10.    pubDelay = pubDelay1;
  11.  
  12.    if (pub == pubs.length)
  13.      pub = 0;
  14.    document.pubImg.src = pubs[++pub];
  15.    pubT = setTimeout("AfficherPub(pubs,pubDelay)", pubDelay1);
  16. }
  17. // end script -->
  18. </SCRIPT>